home *** CD-ROM | disk | FTP | other *** search
/ C!T ROM 3 / ct-rom iiib.zip / ct-rom iiib / WINDOWS / UTILITY / DESKTOP / W_ONE49 / ARRANGE.BA_ / ARRANGE.BA
Text File  |  1994-04-27  |  1KB  |  31 lines
  1. @echo off
  2.  
  3. rem ╔═════════════════════════════════════════════════╗
  4. rem ║                                                 ║
  5. rem ║                 ARRANGE.BAT                     ║
  6. rem ║                                                 ║
  7. rem ║ Example  batch  program  that  illustrates  the ║
  8. rem ║ use of the external command FUNC.  This program ║
  9. rem ║ must be run from the WinOne prompt.             ║
  10. rem ║                                                 ║
  11. rem ║ Description: Arranges all the iconic windows on ║
  12. rem ║              the desktop.                       ║
  13. rem ║                                                 ║
  14. rem ║                                                 ║
  15. rem ║   Written by Lucien Cinc (1993)                 ║
  16. rem ║                                                 ║
  17. rem ╚═════════════════════════════════════════════════╝
  18.  
  19. func user getdesktopwindow
  20. func user arrangeiconicwindows %funca%
  21. if %funca%==0 goto error
  22. goto end
  23.  
  24. :error
  25. color red black
  26. echo Unable to arrange icons
  27. echo.
  28.  
  29. :end
  30.  
  31.